;;;QQ:67762207
[@Event_taming]
{
#IF
#SAY
ʦջ֮ҲѱĹ,ѱЩһǷҺܴľҪ޹\
</@TamingNormal(1,1)>1Сʱ \
</@TamingNormal(2,2)>2Сʱ \
</@TamingNormal(3,5)>3Сʱ \
<./@TamingNormal(4,9)>4Сʱ\
<./@TamingNormal(5,14)>5Сʱ \
</@TamingRandom(1,90000)>1Сʱ \
</@TamingRandom(2,180000)>2Сʱ\
</@TamingRandom(3,300000)>3Сʱ \
<./@TamingRandom(4,600000)>4Сʱ \
<./@TamingRandom(5,1000000)>5Сʱ \
</@exit> \

[@TamingNormal()]
#IF
#ACT
Mov D0 %ARG(1)
Mov D1 %ARG(2)

#IF

#SAY
ЩѡĹ \\

#IF
checklevel 56

#SAY
56ȼ: <ʨ/@TamingMon(ʨ,130000)> , </@TamingMon(1,130000)> \\

#IF
checklevel 48

#SAY
48ȼ : <Ѫ/@TamingMon(Ѫ,100000)>, <ҹ/@TamingMon(ҹ,100000)> \\

#IF
checklevel 44

#SAY
44ȼ : <ʿ/@TamingMon(ʿ,80000)> , <ù/@TamingMon(ù,80000)>  \\

#IF
checklevel 33

#SAY
33ȼ : <Ұ/@TamingMon(Ұ,40000)> , <Ұ/@TamingMon(Ұ,40000)> , <Ы/@TamingMon(Ы,40000)> \\


#IF
checklevel 22

#SAY
22ȼ : </@TamingMon(,20000)>, </@TamingMon(,30000)>\\

#IF
checklevel 11

#SAY
11ȼ : </@TamingMon(,10000)> , <ս/@TamingMon(ս,10000)> \\

#IF
checklevel 1
!checklevel 11

#SAY
11ȼϲſ޹... \\
< /@exit>

[@TamingMon()]
#IF
#ACT
Mov A1 %ARG(1)
Mov D2 %ARG(2)
Mul D2 D1
Mov D3 %P9

#IF

#SAY
<$OUTPUT(A1)>ѡĽ׶.. \\
<1ȼ./@TrainMon(0)> \
<2ȼ./@TrainMon(1)> \
<3ȼ./@TrainMon(2)> \
<4ȼ./@TrainMon(3)> \
<5ȼ./@TrainMon(4)> \
<6ȼ./@TrainMon(5)> \
<7ȼ./@TrainMon(6)> \
<8ȼ./@TrainMon(7)> \


[@TrainMon()]
#IF
#ACT
Mov D4 %ARG(1)
#IF
Equal D4 0
#ACT
Mov D5 %D3

#ELSEACT
Mul D3 D4 
Mov D5 %P9  

#SAY
<$OUTPUT(D4)>ȼ<$OUTPUT(A1)>ķΪ <$OUTPUT(D5)>... \\
<$OUTPUT(D5)>֧<޹./@TamingMon_Result> \
<   ./@exit>
#ELSESAY
<$OUTPUT(D4)>ȼ<$OUTPUT(A1)>ķΪ <$OUTPUT(D5)>... \\
<$OUTPUT(D5)>֧<޹./@TamingMon_Result> \
<   ./@exit>


[@TamingMon_Result]
#IF
checkgold %D5
checkmonrecall
#ACT
take  %D5
monrecall %A1 %D0 %D4

#SAY
<$OUTPUT(A1)>Ѿ.Ҫס,һʱᱻ. \\
<   /@exit>


#ELSESAY
Ѿ޹Ҳ. \\
<   /@exit>

[@TamingRandom()]
#IF
#ACT
Mov D0 %ARG(1)
Mov D1 %ARG(2)

#IF
checklevel 1
!checklevel 11
#ACT
Movr D2 160

#IF
checklevel 11
!checklevel 22
#ACT
Movr D2 150

#IF
checklevel 22
!checklevel 33
#ACT
Movr D2 140

#IF
checklevel 33
!checklevel 44
#ACT
Movr D2 130

#IF
checklevel 44
!checklevel 55
#ACT
Movr D2 120

#IF
checklevel 55
#ACT
Movr D2 110

#IF
checkgold %D1
checkmonrecall

#ELSESAY
Ѿ޹Ҳ. \\
<   /@exit>

#ELSEACT
break

#IF
Elarge D2 0
Small D2 10
#ACT
Mov A1 ""
goto @TamingRandom_Result
break

#IF
Elarge D2 10
Small D2 20
#ACT
Mov A1 "ս"
goto @TamingRandom_Result
break

#IF
Elarge D2 20
Small D2 30
#ACT
Mov A1 "սʿ"
goto @TamingRandom_Result
break

#IF
Elarge D2 30
Small D2 40
#ACT
Mov A1 ""
goto @TamingRandom_Result
break


#IF
Elarge D2 40
Small D2 50
#ACT
Mov A1 "Ұ"
goto @TamingRandom_Result
break

#IF
Elarge D2 50
Small D2 60
#ACT
Mov A1 "Ұ"
goto @TamingRandom_Result
break

#IF
Elarge D2 60
Small D2 70
#ACT
Mov A1 "Ы"
goto @TamingRandom_Result
break

#IF
Elarge D2 60
Small D2 68
#ACT
Mov A1 "ʿ"
goto @TamingRandom_Result
break


#IF
Elarge D2 68
small D2 76
#ACT
Mov A1 "ù"
goto @TamingRandom_Result
break

#IF
Elarge D2 76
Small D2 84
#ACT
Mov A1 "佫"
goto @TamingRandom_Result
break

#IF
Elarge D2 84
Small D2 89
#ACT
Mov A1 "Ѫ"
goto @TamingRandom_Result
break

#IF
Elarge D2 89
Small D2 92
#ACT
Mov A1 "ҹսʿ"
goto @TamingRandom_Result
break

#IF
Elarge D2 92
Small D2 95
#ACT
Mov A1 "Ứ"
goto @TamingRandom_Result
break

#IF
Elarge D2 95
Small D2 97
#ACT
Mov A1 "ҹһ"
goto @TamingRandom_Result
break

#IF
Elarge D2 97
Small D2 99
#ACT
Mov A1 "ҹһ"
goto @TamingRandom_Result
break

#IF
Equal D2 100
#ACT
Mov A1 "ʨ"
goto @TamingRandom_Result
break

#IF
Equal D2 101
#ACT
Mov A1 "1"
goto @TamingRandom_Result
break

#IF
Random 2
#ACT
Mov A1 ""
goto @TamingRandom_Result
break
#ELSEACT
Mov A1 ""
goto @TamingRandom_Result
break

[@TamingRandom_Result]
#IF
checkgold %D1
#ACT
take  %D1
monrecall %A1 %D0 0

#SAY
<$OUTPUT(A1)>Ѿ.Ҫס,һʱᱻ.\\
<   /@exit>
#ELSESAY
Ҳ޷޹.֪ѵһֻҪѶľ? \\
<   /@exit>

}
;;;QQ:67762207